home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 22 / PC Actual CD 22.iso / progs / DIRECTOR / data.z / ScriptAuthor-Navigate.dir / Scripts_3_Expand Window.ls < prev    next >
Encoding:
Text File  |  1997-05-10  |  291 b   |  16 lines
  1. global gScriptAuthoringWindow
  2.  
  3. on mouseUp
  4.   if gScriptAuthoringWindow = the stage then
  5.     tell the stage
  6.       PlaySound("ButtonClick")
  7.     end tell
  8.   else
  9.     tell gScriptAuthoringWindow
  10.       PlaySound("ButtonClick")
  11.     end tell
  12.   end if
  13.   ChangeWindowSize(#Expand)
  14.   go("Expanded")
  15. end
  16.